foo <- function(a, b, c, ...){
	a+b+c
}

for(i in 1:100)
	foo(1, c=2, 3 ,4)

42
